home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Know Your Hockey - The Greatest Player Resource
/
Know Your Hockey: The Greatest Player Resource.iso
/
hockey
/
director
/
ktgcst.cst
/
00043_Script_ScrollUp and DownScripts for skills
< prev
next >
Wrap
Text File
|
1998-09-28
|
1KB
|
41 lines
global gButtonState
-- use gButtonState list to see what is currently selected
-- then set the next one up or down on
on ScrollUp
repeat with x = 25 to 30
set Hilite = getat(gButtonState,x)
if Hilite = 2 then exit repeat
end repeat
if x = 30 then exit
setat(gbuttonState,x,0)
set the membernum of sprite x = the membernum of sprite x-1
set the blend of sprite x = 0
set the blend of sprite x-20 = 0
set x = x+1
setat(gButtonState,x,2)
set the membernum of sprite x = the membernum of sprite x+1
set the blend of sprite x = 100
set the blend of sprite x-20 = 100
-- loadAudioMedia(x)
end
on ScrollDown
repeat with x = 30 down to 25
set Hilite = getat(gButtonState,x)
if Hilite = 2 then exit repeat
end repeat
if x = 25 then exit
setat(gbuttonState,x,0)
set the membernum of sprite x = the membernum of sprite x-1
set the blend of sprite x = 0
set the blend of sprite x-20 = 0
set x = x-1
setat(gButtonState,x,2)
set the membernum of sprite x = the membernum of sprite x+1
set the blend of sprite x = 100
set the blend of sprite x-20 = 100
-- loadAudioMedia(x)
end